home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1992 June: ROMin Holiday / ADC Developer CD (1992-06) (''ROMin Holiday'')_iso / Developer Connection - 06-1992.iso / Development Platforms / Apple II / Essentials / MPW IIGS Interfaces / PIIGSIncludes / Desk.p < prev    next >
Encoding:
Text File  |  1990-08-01  |  1.8 KB  |  71 lines  |  [TEXT/MPS ]
  1. {********************************************
  2. ; File: Desk.p
  3. ;
  4. ;
  5. ; Copyright Apple Computer, Inc. 1986-90
  6. ; All Rights Reserved
  7. ;
  8. ********************************************}
  9.  
  10. UNIT DESK;
  11.  
  12. INTERFACE
  13.  
  14. USES TYPES,QUICKDRAW,EVENTS;
  15.  
  16. CONST
  17. { Error Codes }
  18. daNotFound = $0510;  { desk accessory not found }
  19. notSysWindow = $0511;  { not the system window }
  20.  
  21. { NDA Action Codes }
  22. eventAction = $0001;
  23. runAction = $0002;
  24. undoAction = $0005;
  25. cutAction = $0006;
  26. copyAction = $0007;
  27. pasteAction = $0008;
  28. clearAction = $0009;
  29. cursorAction = $0003;
  30.  
  31. { SystemEdit Codes }
  32. undoEdit = $0001;
  33. cutEdit = $0002;
  34. copyEdit = $0003;
  35. pasteEdit = $0004;
  36. clearEdit = $0005;
  37.  
  38. PROCEDURE AddToRunQ ( runItemPtr:Ptr)  ;
  39. PROCEDURE ChooseCDA   ;
  40. PROCEDURE CloseAllNDAs   ;
  41. PROCEDURE CloseNDA ( refNum:Integer)  ;
  42. PROCEDURE CloseNDAByWinPtr ( theWindowPtr:WindowPtr)  ;
  43. PROCEDURE DeskBootInit   ;
  44. PROCEDURE DeskReset   ;
  45. PROCEDURE DeskShutDown   ;
  46. PROCEDURE DeskStartUp   ;
  47. FUNCTION DeskStatus  : Boolean ;
  48. FUNCTION DeskVersion  : Integer ;
  49. PROCEDURE FixAppleMenu ( startingID:Integer)  ;
  50. FUNCTION GetDAStrPtr  : Ptr ;
  51. FUNCTION GetNumNDAs  : Integer ;
  52. PROCEDURE InstallCDA ( idHandle:Handle)  ;
  53. PROCEDURE InstallNDA ( idHandle:Handle)  ;
  54. FUNCTION OpenNDA ( idNum:Integer) : Integer ;
  55. PROCEDURE RemoveCDA ( idHandle:Handle)  ;
  56. PROCEDURE RemoveFromRunQ ( runItemPtr:Ptr)  ;
  57. PROCEDURE RemoveNDA ( idHandle:Handle)  ;
  58. PROCEDURE RestAll   ;
  59. PROCEDURE RestScrn   ;
  60. PROCEDURE SaveAll   ;
  61. PROCEDURE SaveScrn   ;
  62. PROCEDURE SetDAStrPtr ( altDispHandle:Handle; stringTablePtr:Ptr)  ;
  63. PROCEDURE SystemClick ( eventRecPtr:EventRecord; theWindowPtr:GrafPortPtr; findWndwResult:Integer)  ;
  64. FUNCTION SystemEdit ( editType:Integer) : Boolean ;
  65. FUNCTION SystemEvent ( eventWhat:Integer; eventMessage:Longint; eventWhen:Longint; eventWhere:Point; eventMods:Integer) : Boolean ;
  66. PROCEDURE SystemTask   ;
  67.  
  68. IMPLEMENTATION
  69.  
  70. END.
  71.